/*
 * Copyright 2010 Michael Nitsche
 *
 * This program is free software: you can redistribute it and/or modify
 * it under the terms of the GNU Lesser General Public License as published by
 * the Free Software Foundation, either version 3 of the License, or
 * (at your option) any later version.
 *
 * This program is distributed in the hope that it will be useful,
 * but WITHOUT ANY WARRANTY; without even the implied warranty of
 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
 * GNU Lesser General Public License for more details.
 *
 * You should have received a copy of the GNU Lesser General Public License
 * along with this program.  If not, see <http://www.gnu.org/licenses/>.
 */

package de.mnit.basis.sys.datei;

import java.io.File;
import java.io.FileFilter;

import de.mnit.basis.daten.struktur.liste.Liste;
import de.mnit.basis.daten.struktur.liste.S_Liste;
import de.mnit.basis.fehler.Fehler;
import de.mnit.basis.fehler.system.F_Sys_Datei;
import de.mnit.basis.sys.Ausgabe;
import de.mnit.basis.sys.Sys;

/**
 * @author Michael Nitsche
 *
 * TODO!!! Trenner systemspezifisch!!!
 */
public class DSOrdner extends A_DS_Element implements S_Ordner {

	public DSOrdner(Object datei) throws F_Sys_Datei {
		Fehler.objekt.wenn_Null(datei);
		if(datei instanceof String)
			this.file=new File((String)datei);
		else if(datei instanceof File)
			this.file=(File)datei;
		else
			Fehler.objekt.da_HierUngueltig("Typ nicht unterstützt",datei.getClass().getName(),datei);
		if(!this.file.exists())
			Fehler.datei.da_Fehlt("Ordner existiert nicht", this.file.getAbsolutePath());
		if(!this.file.isDirectory())
			Fehler.datei.da_FalscherTyp("Ordner erwartet, Datei gefunden", this.file.getAbsolutePath());
	}


	public static DSOrdner neu(File f) throws F_Sys_Datei {
		return new DSOrdner(f);
	}

	public static DSOrdner neu(String pfad) throws F_Sys_Datei {
		return new DSOrdner(pfad);
	}

	public static DSOrdner neuFlex(String pfad) throws F_Sys_Datei {
		DateiSystem.pfadAnlegen(pfad); return new DSOrdner(pfad);
	}


	public static boolean existiert(String name) throws F_Sys_Datei {
		File f=new File(name);
		return f.exists();
	}


	public boolean istOrdner() {
		return true;
	}

	public S_Datei dF(String dateiname) {
		String neu=this.file.getAbsolutePath()+Sys.gTrennerVerz()+dateiname;
		File f=new File(neu);
		return new DSDatei(f);
	}

	public S_Datei dF(String name, String endung) {
		return dF(name+"."+endung);
	}

	public S_Datei dN(String name, String endung) throws F_Sys_Datei {
		return dN(name+"."+endung);
	}

	public S_Datei dN(String dateiname) throws F_Sys_Datei {
		String neu=this.file.getAbsolutePath()+Sys.gTrennerVerz()+dateiname;
		File f=new File(neu);
		Fehler.datei.wenn_Existiert(f);
		return new DSDatei(f);
	}

	public S_Datei d(String dateiname) throws F_Sys_Datei {
		String neu=this.file.getAbsolutePath()+Sys.gTrennerVerz()+dateiname;
		File f=new File(neu);
		Fehler.datei.wenn_Fehlt(f);
		return new DSDatei(f);
	}

	public S_Datei d(String dateiname, String endung) throws F_Sys_Datei {
		return d(dateiname+"."+endung);
	}

	public S_Ordner oF(String name) throws F_Sys_Datei {
		String neu=this.file.getAbsolutePath()+"/"+name;
		File f=new File(neu);
		if(!f.exists())
			if(!f.mkdir())
				throw Fehler.datei.da_AktionGescheitert("Verzeichnis anlegen", f);
		try {
			return new DSOrdner(f);
		}
		catch(F_Sys_Datei e)   { throw Fehler.datei.da_Fehlt(e, "Ordner konnte nicht angelegt werden"); }
	}

	public S_Ordner oN(String name) throws F_Sys_Datei {
		String neu=this.file.getAbsolutePath()+"/"+name;
		File f=new File(neu);
		Fehler.datei.wenn_Existiert(f);
		if(!f.mkdir())
			throw Fehler.datei.da_AktionGescheitert("Verzeichnis anlegen", f);
		return new DSOrdner(f);
	}

	public S_Ordner o(String name) throws F_Sys_Datei {
		String neu=this.file.getAbsolutePath()+"/"+name;
		File f=new File(neu);
		Fehler.datei.wenn_Fehlt(f);
		return new DSOrdner(f);
	}

	public void sNurLesbar() throws F_Sys_Datei {
		boolean b=this.file.setReadOnly();
		if(!b) Fehler.datei.da_Zugriffsfehler(this.file);
	}

	public S_Liste<S_DS_Element> inhalt() {
		S_Liste<S_DS_Element> erg=Liste.neu();
		File[] dateien=this.file.listFiles();
		for(File datei : dateien)
			if(datei.isFile())
				erg.plus(new DSDatei(datei));
			else try {
					erg.plus(new DSOrdner(datei));
				}
				catch(F_Sys_Datei e)   { throw Fehler.sonstige.da_Unmoeglich(e); }
		return erg;
	}

	public S_Liste<S_Datei> inhaltD() {
		S_Liste<S_Datei> erg=Liste.neu();
		File[] dateien=this.file.listFiles();
		for(File datei : dateien)
			if(datei.isFile()) erg.plus(new DSDatei(datei));
		return erg;
	}

	public S_Liste<S_Datei> inhaltD(boolean rekursiv) {
		return inhaltD(rekursiv, true);
	}

	public S_Liste<S_Datei> inhaltD(boolean rekursiv, boolean versteckte_ordner) {
		return rekursiv
			? iInhaltD(Liste.neu(S_Datei.class), this, versteckte_ordner)
			: inhaltD();
	}

	public S_Liste<S_Datei> inhaltD(final String regex) {
		S_Liste<S_Datei> erg=Liste.neu();
		File[] dateien=this.file.listFiles(new FileFilter(){
			public boolean accept(File pathname) {
				return pathname.getName().matches(regex);
			}
		});
		for(File datei : dateien)
			if(datei.isFile()) erg.plus(new DSDatei(datei));
		return erg;
	}

	public S_Liste<S_Datei> inhaltD_mitEndung(final String... filter) {
		return inhaltD_mitEndung(false, filter);
	}

	public S_Liste<S_Datei> inhaltD_mitEndung(boolean rekursiv, String... filter) {
		Fehler.bereich.wenn_ZuKurz(1, filter);
		Fehler.bereich.wenn_ElementNull(filter);
		return rekursiv
			? iInhaltD_mitEndung(Liste.neu(S_Datei.class), this, filter)
			: iInhaltD_mitEndung(filter);
	}

	public S_Liste<S_Ordner> inhaltO() {
		S_Liste<S_Ordner> erg=Liste.neu();
		File[] dateien=this.file.listFiles();
		for(File datei : dateien)
			if(datei.isDirectory())
				try {
					erg.plus(new DSOrdner(datei));
				}
				catch(F_Sys_Datei e) {
					throw Fehler.sonstige.da_Unmoeglich(e);
				}
		return erg;
	}

	public S_Liste<S_Ordner> inhaltO(final String regex) {
		S_Liste<S_Ordner> erg=Liste.neu();
		File[] dateien=this.file.listFiles(new FileFilter(){
			public boolean accept(File pathname) {
				return pathname.isDirectory() && pathname.getName().matches(regex);
			}
		});
		for(File datei : dateien)
			try {
				erg.plus(new DSOrdner(datei));
			}
			catch(F_Sys_Datei e) {
				throw Fehler.sonstige.da_Unmoeglich(e);
			}
		return erg;
	}

	public boolean kennt(String name) {
		throw Fehler.sonstige.da_ToDo();
	}

	public boolean kenntD(String name) {
		return this.inhaltD(name).gLaenge()>0; //TODO Testen!!!
	}

	public boolean kenntO(String name) {
		return this.inhaltO(name).gLaenge()>0;
	}

	public String gPfad() {
		throw Fehler.sonstige.da_ToDo();
	}

	public void loeschen() throws F_Sys_Datei {
		if(this.file.exists()) {
			Ausgabe.debug("Lösche Ordner: "+this.gPfadKomplett());
			if(!this.file.delete())
				Fehler.datei.da_AktionGescheitert("Ordner löschen", this.file);
		}
	}

	public void umbenennen(String neu) throws F_Sys_Datei {
		String pfadneu=this.gElternOrdner().gPfadKomplett()+Sys.gTrennerVerz()+neu;
		File file_neu=new File(pfadneu);
		boolean ok=DateiSystem.umbenennen(this.gFile(), file_neu);
		if(!ok) throw Fehler.datei.da_AktionGescheitert("Umbenennen", this.file, neu, pfadneu);
		this.file=file_neu;
	}

//	public void verschieben(S_Ordner nach) throws F_DateiSys {
//		Ausgabe.debug(this.gFile().getAbsolutePath(), nach.gPfadKomplett());
//		DateiSystem.verschieben(this.gFile(), nach.gFile());
//	}

	public String gName() {
		return this.file.getName();
	}

	public String gNameKomplett() {
		return this.gName();
	}

	public S_Ordner gElternOrdner() {
		try {
			return new DSOrdner(this.file.getParent());
		}
		catch(F_Sys_Datei e)   { throw Fehler.sonstige.da_Unmoeglich(e); }
	}

	// INTERN

	private S_Liste<S_Datei> iInhaltD(S_Liste<S_Datei> liste, S_Ordner ordner, boolean versteckte_ordner) {
		if(!versteckte_ordner && (ordner.gFile().isHidden() || ordner.gName().startsWith(".")))
			return liste;
		liste.plusAlle(ordner.inhaltD());
		S_Liste<S_Ordner> inhalt=ordner.inhaltO();
		for(S_Ordner o : inhalt)
			iInhaltD(liste, o, versteckte_ordner);
		return liste;
	}

	private S_Liste<S_Datei> iInhaltD_mitEndung(S_Liste<S_Datei> liste, S_Ordner ordner, final String[] filter) {
		liste.plusAlle(ordner.inhaltD_mitEndung(filter));
		S_Liste<S_Ordner> inhalt=ordner.inhaltO();
		for(S_Ordner o : inhalt) iInhaltD_mitEndung(liste, o, filter);
		return liste;
	}

	private S_Liste<S_Datei> iInhaltD_mitEndung(final String[] filter) {
		Fehler.zahl.wenn_ZuKlein(1, filter.length);
		String regex="^.*(";
		for(int i=0; i<filter.length; i++) {
			if(i>0) regex+="|";
			regex+="\\."+filter[i].toLowerCase();
		}
		regex+=")$";
		final String regex2=regex;
		S_Liste<S_Datei> erg=Liste.neu();
		File[] dateien=this.file.listFiles(new FileFilter(){
			public boolean accept(File pathname) {
				return pathname.getName().toLowerCase().matches(regex2) && pathname.isFile();
			}
		});
		for(File datei : dateien)
			erg.plus(new DSDatei(datei));
		return erg;
	}

}
